Fix ref to free var
authorjustbur <justin@burkett.cc>
Mon, 3 Aug 2015 18:54:20 +0000 (14:54 -0400)
committerjustbur <justin@burkett.cc>
Mon, 3 Aug 2015 18:54:20 +0000 (14:54 -0400)
which-key.el

index cb68ec06af5b1b7b9b054c20aaaf0c7efbaad308..6ec03c22ecf9531d7b826b11ea1eddbd7e5f57d2 100644 (file)
@@ -921,7 +921,7 @@ Returns a plist that holds the page strings, as well as metadata."
   (let ((cols-w-widths (mapcar #'which-key--pad-column
                                (-partition-all avl-lines keys)))
         (page-width 0) (n-pages 0) (n-keys 0)
-        page-cols pages page-widths keys/page)
+        page-cols pages page-widths keys/page col)
     (if (> (apply #'max (mapcar #'car cols-w-widths)) avl-width)
         ;; give up if any columns don't fit
         (list :pages nil :page-height 0 :page-widths '(0)